A collection of the blocks in the current drawing that contains the tag represented by the current Tag object.
Syntax
BlockList As Object
Remarks
Each block in the collection has only one (string) property: BlockName.
Example
Dim Blocks Blocks = Tag.BlockList